home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple II Magazines (PO)
/
Nibble Volume 13, No. 04 (1992-04)(MindCraft Publishing)(Side A).zip
/
Nibble Volume 13, No. 04 (1992-04)(MindCraft Publishing)(Side A).po
/
LOCK.OUT.DEMO.bas
< prev
next >
Wrap
BASIC Source File
|
1996-12-24
|
190b
|
5 lines
10 POKE 4126,0
20 POKE 49168,0
30 IF PEEK(49152) >128 THEN POKE 49168,0: END
40 IF PEEK(4126) = 255 THEN PRINT "SORRY BUD, NO CONTROL PANEL": POKE 49168,0: POKE 4126,0
50 GOTO 10